unit UCalendario;

interface
type
  t_data = record
    data:TDateTime;
    descricao:string;
  end;
  t_datas = array of t_data;
implementation

end.
